www.gusucode.com > 婚庆仪礼策划公司网站系统源代码 梦紫色 > 婚庆仪礼策划公司网站系统源代码 梦紫色/Admin/usermanage.asp
<!--#include file="conn.asp"-->
<!--#include file="inc/format.asp"-->
<!--#include file="inc/error.asp"-->
<!--#include file="check1.asp"-->
<%
checked = request("checked")
trade = request("trade")
userName = request("userName")
if request("cur_action")="del" then
sql = "DELETE FROM userInfo WHERE id=" & request("id")
conn.execute sql
sql = "DELETE FROM [Order] WHERE ProID in (select p_id from P_info where userid = "&request("id")&")"
conn.execute sql
sql = "DELETE FROM P_info WHERE userid=" & request("id")
conn.execute sql
response.redirect "usermanage.asp?pageno=" & cstr(request("Pageno")) & "&userName="&userName&"&trade="&trade&"&checked="&checked
isdel=true
end if
if request("oper") = "check" then
sql = "update userInfo set checked = 1 WHERE id=" & request("id")
conn.execute sql
response.redirect "usermanage.asp?pageno=" & cstr(request("Pageno")) & "&userName="&userName&"&trade="&trade&"&checked="&checked
end if
if request("oper") = "uncheck" then
sql = "update userInfo set checked = 0 WHERE id=" & request("id")
conn.execute sql
response.redirect "usermanage.asp?pageno=" & cstr(request("Pageno")) & "&userName="&userName&"&trade="&trade&"&checked="&checked
end if
if request("oper") = "VIP" then
sql = "update userInfo set trade = 'VIP' WHERE id=" & request("id")
conn.execute sql
response.redirect "usermanage.asp?pageno=" & cstr(request("Pageno")) & "&userName="&userName&"&trade="&trade&"&checked="&checked
end if
if request("oper") = "普通" then
sql = "update userInfo set trade = '普通' WHERE id=" & request("id")
conn.execute sql
response.redirect "usermanage.asp?pageno=" & cstr(request("Pageno")) & "&userName="&userName&"&trade="&trade&"&checked="&checked
end if
if request("Submit") = "修改" then
sql = "update userInfo set prestige = '"&request("prestige")&"' WHERE id=" & request("mid")
conn.execute sql
response.redirect "usermanage.asp?pageno=" & cstr(request("Pageno")) & "&userName="&userName&"&trade="&trade&"&checked="&checked
end if
%>
<HTML>
<HEAD>
<TITLE>::.网站后台管理系统->订单管理</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<STYLE></STYLE>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<link href="inc/style.css" rel="stylesheet" type="text/css">
</HEAD>
<script language="javascript">
function dele_check(id,pageno){
if (confirm("确定删除吗？删除后数据不能再恢复！")){
location.replace("usermanage.asp?id="+id+"&pageno="+pageno+"&cur_action=del");
}
}
</script>
<BODY bgColor=#ffffff leftMargin=0 topMargin=0 marginheight="0" marginwidth="0">
<br>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#666666">
<tr>
<td height="409" bgcolor="#FFFFFF"><table width="600" border="0" align="center" cellpadding="0" cellspacing="0" class="tableBorder">
<tr>
<td height="24" align="center" background="img/admin_bg_1.gif" class="css"><font class="unnamed1"><strong>用
户 管 理(详细信息模式)</strong></font></td>
</tr>
<tr>
<td height="39" class="css"><strong> <span class="unnamed1">功能提示：<br>
</span></strong><span class="unnamed1"> 删除用户同时也会删除该用户发布的供求信息</span></td>
</tr>
<tr>
<td height="28" class="css">
<form name="form1" method="post" action="usermanage.asp">
搜索用户
<input name="userName" type="text" id="userName" size="15">
等级
<select name="trade" id="trade">
<option selected value="">所有</option>
<option value="VIP">VIP</option>
<option value="普通">普通</option>
</select>
状态
<select name="checked" id="checked">
<option selected value="">所有</option>
<option value="1">审核</option>
<option value="0">未审核</option>
</select>
<input type="submit" name="Submit" value="提交">
</form></td>
</tr>
<tr>
<td height="337" class="css">
<% '翻页程序
pageno=request.querystring("pageno")
if pageno = "" then
pageno = 0
end if
pmcount=6
set reco=server.createobject("ADODB.recordset")
sqlstr="select * from userInfo where true "
if checked <> "" then
sqlstr = sqlstr & " and checked = '"&checked&"'"
end if
if trade <> "" then
sqlstr = sqlstr & " and trade = '"&trade&"'"
end if
if userName <> "" then
sqlstr = sqlstr & " and userName like '%"&userName&"%'"
end if
sqlstr = sqlstr & " order by id desc"
reco.open sqlstr,conn,1,1
if reco.recordcount<>0 then
reco.pagesize=pmcount
mpage=reco.pagecount
if isempty(pageno) or cint(pageno)<1 or cint(pageno)>mpage then
pageno=1
end if
reco.absolutepage=pageno
rc=reco.pagesize
re=1
do while not reco.eof and rc>0%>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000">
<tr bgcolor="#FFFFFF" class="unnamed1">
<td height="25" colspan="3" bgcolor="#FFFFFF"><span class="border1"><font color="#330000"> 用户编号：[<%=reco("ID")%>]
注册日期：<%=reco("postdate")%> </font></span> 等级：<%=reco("trade")%></td>
<td width="33%"><div align="center"><span class="border2"><font color="#330000"><a href='javascript:dele_check("<%=reco("id")%>","<%=cstr(pageno)%>")'>
<font color="#990000">删除</font></a>
<% if reco("checked") = "0" then %>
<a href="usermanage.asp?id=<%=reco("id")%>&oper=check&pageno=<%=pageno%>&trade=<%=trade%>&checked=<%=checked%>">审核</a>
<%else%>
<a href="usermanage.asp?id=<%=reco("id")%>&oper=uncheck&pageno=<%=pageno%>&trade=<%=trade%>&checked=<%=checked%>">取消审核</a>
<%end if%>
<% if reco("trade") = "VIP" then %>
<a href="usermanage.asp?id=<%=reco("id")%>&oper=%C6%D5%CD%A8&pageno=<%=pageno%>&trade=<%=trade%>&checked=<%=checked%>">降为普通</a>
<%else%>
<a href="usermanage.asp?id=<%=reco("id")%>&oper=VIP&pageno=<%=pageno%>&trade=<%=trade%>&checked=<%=checked%>">升级VIP</a>
<%end if%>
</font></span></div></td>
</tr>
<tr bgcolor="#FFFFFF" class="unnamed1">
<td width="12%" bgcolor="#F2f2f2"><div align="center"><span class="border1">用户名</span></div></td>
<td height="25" colspan="3" bgcolor="#FFFFFF"><span class="border1"><font color="#330000"> <%=reco("userName")%> 状态：
<% if reco("checked") = "1" then response.Write("通过") else response.Write("未通过") end if%>
</font></span></td>
</tr>
<tr bgcolor="#FFFFFF" class="unnamed1">
<td bgcolor="#F2f2f2"><div align="center">密码</div></td>
<td height="26" colspan="3" bgcolor="#FFFFFF"><span class="border1"><font color="#330000"> <%=reco("password")%></font></span></td>
</tr>
<tr bgcolor="#FFFFFF" class="unnamed1">
<td height="26" align="center" bgcolor="#F2f2f2">真实姓名</td>
<td height="26" colspan="3" bgcolor="#FFFFFF"><span class="border1"><font color="#330000"> <%=reco("trueName")%></font></span></td>
</tr>
<tr bgcolor="#FFFFFF" class="unnamed1">
<td rowspan="7" bgcolor="#F2f2f2"><div align="center"></div>
<div align="center"></div>
<div align="center"></div>
<div align="center"></div>
<div align="center">联系方式</div></td>
<td width="12%" bgcolor="#F2f2f2" class="unnamed1"><div align="center">电 话</div></td>
<td height="25" colspan="2" bgcolor="#FFFFFF" class="unnamed1"><span class="border1"><font color="#330000"> <%=reco("tel")%></font></span></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#F2f2f2" class="unnamed1"><div align="center" class="css">电子邮件</div></td>
<td height="25" colspan="2" bgcolor="#FFFFFF" class="unnamed1"><span class="border1"><font color="#330000"> <%=reco("email")%></font></span></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#F2f2f2" class="unnamed1"><div align="center" class="css">地址</div></td>
<td height="25" colspan="2" bgcolor="#FFFFFF" class="unnamed1"><span class="border1"><font color="#330000"> <%=reco("address")%></font></span></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#F2f2f2" class="unnamed1"><div align="center" class="css">手机</div></td>
<td height="5" colspan="2" bgcolor="#FFFFFF" class="unnamed1"><span class="border1"><font color="#330000"> <%=reco("mobile")%></font></span></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#F2f2f2" class="unnamed1"> 身份证</td>
<td height="26" colspan="2" bgcolor="#FFFFFF" class="unnamed1"><span class="border1"><font color="#330000"> <%=reco("sfz")%></font></span></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#F2f2f2" class="unnamed1">邮编</td>
<td height="12" colspan="2" bgcolor="#FFFFFF" class="unnamed1"><span class="border1"><font color="#330000"> <%=reco("zip")%></font></span></td>
</tr>
<tr bgcolor="#FFFFFF">
<td bgcolor="#F2f2f2" class="unnamed1">备注</td>
<td height="12" colspan="2" bgcolor="#FFFFFF" class="unnamed1"><span class="border1"><font color="#330000"> <%=reco("content")%></font></span></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height=8></td>
</tr>
</table>
<%
reco.movenext
re=re+1
rc=rc-1
loop
%>
<table border=0 bordercolor=#111111 cellpadding=0 cellspacing=0
style="BORDER-COLLAPSE: collapse" width="98%" align="center">
<tbody>
<tr class="unnamed1">
<td width=198 class="css">[共<font color=red><%=reco.recordcount %></font>条留言
当前第<font color=red><%=pageno %></font>页/共<font color=red><%=mpage %></font>页]
</td>
<td width=454 align="right"><p> <span class="css">
<%if pageno>1 then
response.write "<a href='?pageno="&pageno-1&"&userName="&userName&"&trade="&trade&"&checked="&checked&"'>[上一页]</a>"
else
response.write "[上一页]"
end if
%>
[
<% for pno=1 to mpage
if pno=cint(pageno) then%>
<%=pno%>
<%else%>
<b><a href='?pageno=<%=pno%>&userName=<%=userName%>&trade=<%=trade%>&checked=<%=checked%>'><%=pno%></a></b>
<%end if%>
<%next%>
]
<%
if int(pageno) < int(reco.pagecount) then
response.write "<a href='?pageno="&pageno+1&"&userName="&userName&"&trade="&trade&"&checked="&checked&"'>[下一页]</a>"
else
response.write "[下一页]"
end if
%>
</span> <a href="javascript:window.print()"><span class="css"><font color="000000">打印本页</font></span></a>
</p></td>
<center>
<center>
</center>
</center>
</tr>
</tbody>
</table>
<%
reco.close
set reco=nothing
else
%>
<table width="98%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td align="center"><font color="#FF0000" face="Arial, Helvetica, sans-serif"><b>还
没 有注册用户 ！</b></font></td>
</tr>
</table>
<%
end if
%>
</td>
</tr>
</table></td>
</tr>
</table>
</BODY></HTML>